Set FontDemo$Dir <Obey$Dir>
WimpSlot -min 320k -max 320k
Run <FontDemo$Dir>.!RunImage
